iachar_ Function

private elemental function iachar_(c) result(i)

Get the position in the ISO 646 collating sequence of a varying string character

Arguments

Type IntentOptional Attributes Name
type(varying_string), intent(in) :: c

Return Value integer


Source Code

  elemental function iachar_ (c) result (i)

    type(varying_string), intent(in) :: c
    integer                          :: i


    i = IACHAR(char(c))

! Finish

    return

  end function iachar_